home *** CD-ROM | disk | FTP | other *** search
- ISHA(3I) Last changed: 4-13-99
-
-
- NNAAMMEE
- IISSHHAA, IIIISSHHAA, JJIISSHHAA, KKIISSHHAA - Performs arithmetic shift on an integer
-
- SSYYNNOOPPSSIISS
- IISSHHAA (([II==]_i,, [SSHHIIFFTT==]_s_h_i_f_t))
- IIIISSHHAA (([II==]_i,, [SSHHIIFFTT==]_s_h_i_f_t))
- JJIISSHHAA (([II==]_i,, [SSHHIIFFTT==]_s_h_i_f_t))
- KKIISSHHAA (([II==]_i,, [SSHHIIFFTT==]_s_h_i_f_t))
-
- IIMMPPLLEEMMEENNTTAATTIIOONN
- UNICOS, UNICOS/mk, IRIX systems
-
- CF90, MIPSpro 7 Fortran 90, MIPSpro Fortran 77
-
- SSTTAANNDDAARRDDSS
- Fortran extensions
-
- DDEESSCCRRIIPPTTIIOONN
- The IISSHHAA, IIIISSHHAA, JJIISSHHAA, KKIISSHHAA intrinsic functions perform an
- arithmetic shift of an integer, left or right, by a specified number
- of bits. This function accepts the following arguments:
-
- _i Must be of type integer. For IIIISSHHAA, must be of type integer
- (KIND=2). For JJIISSHHAA, must be of type integer (KIND=4). For
- KKIISSHHAA, must be of type integer (KIND=8). This is the value
- to be shifted.
-
- _s_h_i_f_t Must be of the same type and kind type parameter as _a. This
- is the direction and distance of the shift.
-
- Positive shifts are left, toward the most significant bit.
- Negative shifts are right, toward the least significant bit.
- If _s_h_i_f_t is zero, no shift is performed.
-
- These elemental intrinsic functions. The names of these intrinsics
- cannot be passed as arguments.
-
- RREETTUURRNN VVAALLUUEESS
- The result type and type parameter are the same as _i. The result is
- equal to _i shifted arithmetically by _s_h_i_f_t bits.
-
- Bits shifted out, from the left or from the right, are lost. Zeros
- are shifted in for a left shift. The sign bit is extended for a right
- shift.
-
- The kind of the integer is important because the sign varies among
- integer representations. If you want to shift a 1-byte or 2-byte
- argument, declare it as KIND=1 or KIND=2.
-
- SSEEEE AALLSSOO
- _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l for the printed version of this
- man page.
-